From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 12 Jun 1993 07:19:39 +0000 (+0000)
Subject: (Fcopy_keymap): Check Fkeymapp value with NILP.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~95386
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=98006242df8337523e2c5b7df02815b1407f03a0;p=emacs.git

(Fcopy_keymap): Check Fkeymapp value with NILP.
---

diff --git a/src/keymap.c b/src/keymap.c
index 6d0f9e5c058..24f3daa6549 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -464,7 +464,7 @@ is not copied.")
 
 	  for (i = 0; i < XVECTOR (elt)->size; i++)
 	    if (XTYPE (XVECTOR (elt)->contents[i]) != Lisp_Symbol
-		&& Fkeymapp (XVECTOR (elt)->contents[i]))
+		&& ! NILP (Fkeymapp (XVECTOR (elt)->contents[i])))
 	      XVECTOR (elt)->contents[i] =
 		Fcopy_keymap (XVECTOR (elt)->contents[i]);
 	}